

Table 0*2. Operator Execution Times. (Continued) 



Mnemonic 


Opcode 


Parameters Time 


Remarks 






Reals 




FLT 


204 


10.8 | 14.8 to 46.8 


TOS = 0 | 


[int] : 


[real] 




TOS <> 0 : 

44.8 - 

2.0(trunc(lg(abs(TOS) ) ) ) 
C = 2.0 if TOS < 0 
C = 0.0 otherwise. 


TNC 


190 


12.4 | 


TOS = 0.0 | 


[real] : 


[int] 


15.6 | 


0.0 < abs(TOS) < 0.5 | 






50.0 to 50.8 I 


0.5 <= abs(TOS) < 1.0 : 
50.0 + C 1 






24.0 to 48.8 


abs(TOS) >= 1.0 : 

48.0 - 

0. 8(trunc(lg(abs(T0S) ) ) ) 
C = 0.8 if TOS < 0.0, 

C = 0.0 otherwise. 


RND 


191 


12.4 | 


TOS = 0.0 j 


[real] : 


[int] 


15.6 | 


0.0 < abs(TOS) < 0.5 1 






52.4 to 53.2 I 


0.5 <= abs(tos) < 1.0 : 
52.4 + C | 






24.8 to 49.6 


48.8 - 

0.8(trunc(lg(abs(TOS) ) ) ) 
C = 0.8 if TOS < 0.0, 

C = 0.0 otherwise. 


ABR 


227 


5.2 




[real] ; 


[real] 






NGR 


228 


5.2 




[real] : 


[real] 






D(JP2 


198 


12.0 




[word, word] : [word, word, word, word] 




AER 


192 


18.8 ! 


TOS-1 = 0.0 | 


[real, real] : [real] 


60.8 to 152.8 


Range of times represents 








difference in exponents 
of TOS and TOS-1. As the 
difference increases, 
the time increases until 
the difference exceeds 
the width of the mantissa. 



Page C-23 






Table 


C-2. Operator Execution Times. 


(Continued) 


Mnemonic 


Opcode 


Parameters Time 


Remarks 






Reals Continued 




SBR 


193 


19.2 | 


TOS-1 = 0.0 | 


[real .real] 


: [real] 


64.4 to 152.0 


Times vary for same 
reasons as ADR. 


MPR 


194 


26.4 | 


TOS-1 = 0.0 I 


[real .real] 


; [real] 


159.4 to 177.8 


Time is a function of 
the operands. 


PVR 


195 


32.4 | 


TOS = 0.0 | 


sal .real] 


: [real] 


140.6 to 293.8 


Time is a function of 


El-e a. C i 






the operands . 


EQUREAL 


205 


16.4 | 


TRUE result 1 


[real. real] 


: [bod] 


14.8 i 


FALSE in 1st word 1 






18.4 


FALSE in 2nd word. 


LECKEAL 


206 


16.4 | 


TRUE (TOS = TOS-1) | 


[real .real] 


i — i 
•* 


16.0 to 20.4 1 


TRUE (TOS < TOS-1) : 
16.0 + B + C, 

B = 0.8 if "pos < pos", 
B = 0.0 otherwise, 

C = 3.6 if equal in 1st 
word, 0.0 otherwise I 






16.8 to 22.0 


FALSE (TOS > TOS-1) : 
16. 8 + B + C, 








B = 1.6 if "pos < pos", 
B = 0.0 otherwise. 








C = 3.6 if equal in 1st 
word, 0.0 otherwise. 


GEQREAL 


207 


16.4 | 


TRUE (TOS = TOS-1) 1 


[real .real] 


: [bool] 


16.0 to 20.4 | 


TRUE (TOS > TCS-1 ) : 
16.0 + B + C, 

B = 0.8 if "pos > pos", 
B = 0.0 otherwise, 








C = 3.6 if equal in 1st 
word, 0.0 otherwise. 






16.0 to 20.4 


FALSE (TOS < TOS-1) : 
16.0 + B + C, 

B = 0.8 if "pos > pos", 
B = 0.0 otherwise, 

C = 3.6 if equal .in 1st 
word, 0.0 otherwise. 
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Mnemonic 



Table C-2. Operator Execution Times. (Continued) 
Opcode Parameters Time Remarks 



Time 

Sets 





ADJ 199. UB 14.4 | 

[set] : [ward-block] 13.6 to 1747.6 | 

16.4 to 1431.6 



SRS 188 18.0 | 

[int,int] : [set] 50.4 to 110.4 | 



52.4 to 114.0 | 



56.4 to 1023.6 



INN 218 18.4 | 

[int,set] : [bod] 

22.8 to 52.8 

UNI 219 6.6 | 

[set, set] : [set] 29.2 to 1756.4 | 



19.6 to 1848.4 1 



58.8 to 3475.2 



words (TOS) = UB 1 
set expansion : 

13.6 + 6.8(UB) ! 
set compression : 

16.4 + 

5. 6 (words ( TOS ) ) + 

2. 8(UB - words (TOS)) 

null set (TOS-1 < TOS ) I 

1 word set : 

50.4 + 

2.0 (TOS-1) + 

2 . 0 (TOS ) j 

2 word set : 

52.4 + 

2 . 0 (TOS mod 16) + 

2.0 (TOS-1 mod 16) + C, 

C = 1.6 if TOS > 15, 

C = 0.0 otherwise I 
all others : 

45.6 + 

3 . 6 ( (TOS div 16) + 1) + 
2.0 (TOS mod 16) + 

2.0 (TOS-1 nod 16) - B, 

B = 0.4 if 
((TOS div 16) - 
(TOS-1 div 16)) < 2, 

B = 0.0 otherwise. 

TOS-1 outside bounds of 
set TOS ! 

22.8 + 2.0 (TOS-1 mod 16) 

TOS is null set I 
TOS-1 is null set : 

22.4 + 

6. 8 (words (TOS ) ) 1 
words (TOS) <= words (TOS-1 ) : 

12.4 + 

7. 2 (words (TOS) ) | 
words (TOS) > words (TOS-1) : 
24.0 + 

14. 0 (words (TOS ) ) + 

6 . 8 (words (TOS ) - 

words (TOS-1 ) ) 



Page C-2 5 



Table C-2. Operator Execution Times. (Continued) 



Mnemonic 



INT 
[set, set] : 



E ' DfF 
[set, set] 



EQUPWR 
[set, set] 



Opcode Parameters lime 



Remarks 



Sets Continued 



220 

[set] 



221 

[set] 



182 

[bod] 



11.6 I 
12.0 I 

22.4 to 1851.2 



26.6 to 1848.2 



6.0 | 

12.0 | 

21.2 to 1850.0 



20.8 to 1842.4 



23.6 to 1954.0 



both sets null I 

only TOS null I 

words (TOS ) >= words (TOS-1) 

15.2 + 

7. 2 (words (TOS)) I 
words (TOS ) < words (TOS-1 ) 
16.6 + 

7. 2 (words (TOS) + 

2. 8 (words (TOS-1) - 
words (TCS ) ) 

TOS is null set I 

TOS-1 is null set I 

words (TCS) <= words (TOS-1) 

14.0 + 

7. 2 (words (TOS) ) I 
words (TOS ) > words (TOS-1 ) 
13.6 + 

7 . 2 (words (TOS-1 ) ) 

16.0 + 

7 . 6 (N ) + 

4.0(D) + 

C + B. 

N = # words compared to 
assert FALSE. 

0 < N < words in 

smaller set 
D = # words examined in 
larger set (beyond 
size of smaller set) 
to assert FALSE. 

0 <= D <= (size of 
larger 
set) - N 

C = 2.0 if D <> 0 and 
result is TRUE, 

0.0 otherwise. 

B = 0.0 if words(TOS) 

>= words(TOS-l), 
else 

1.2 if result TRUE 
else 

0.8 if result FALSE 
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Mnemonic 



Table C-2. Operator Execution Times. (Continued) 
Opcode Parameters Time Remarks 



Sets Continued 



LEQPWR 183 

[set, set] : [bod] 



GEQPWR 184 

[set, set] : [bod] 




24.4 to 2158.0 | 
30.0 to 2175.2 



31.2 to 2180.8 



29.2 to 2176.4 



words (TOS) >= words (TOS-1 ) : 
16.0 + 8.4(N) | 
words (TOS-1) > words (TOS) : 
17.2 + 

8.4(N) + 

4.0(D) + C 
N = same as EQUPWR 
D = same as EQUPWR 
C = 0.4 if D <> 0 and 
result is TRUE, 

0.0 otherwise 

words (TOS-1) >= words (TCS) : 

21.6 + 

8 . 4 (N ) + C + B 
C = 1.2 if result is 
TRUE, else 0.0 
B = 0.0 if sets same 
size, else 
0.4 if result TRUE, 
else 

1.2 if result FALSE I 
words (TOS) > words ( TCS -1) : 
20.8 + 

8 . 4 (N ) + 4.0(D) + C 
N = same as EQUPWR 
D = same as EQUPWR 
C = 2.0 if D <> 0 and 
result is TRUE, 

0.0 otherwise 
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Table 02. Operator Execution Times. ( Continued ) 



Mnemonic 



EQUBYT 

[addr/addr] 



LEQBYT 

[addr,addr] 



GeaBvr 

1EQBYT 

[addr/addr] 



Opcode E&rameters Time 



Remarks 



Byte Arrays 



185 B 

: [bod] 



186 B 

: [bod] 



187 B 

: [bod] 



29.6 to 170404.8 | TRUE result : 

19.2 + 

10. 4 ( (B+l ) div 2) + 
2.8( (B+l ) mod 2) | 
21.8 to 170397.0 FALSE result : 

11.4 + 

10. 4 ( (D+l ) div 2) + 

2 . 8( (D+l ) nod 2) 

D = # bytes compared to 
assert FALSE. 



28.8 to 170404.0 



27.2 to 170402.4 



28.0 to 170403.2 



EQUAL (TRUE) result : 
18.4 + 

10. 4( (B+l ) div 2) + 

2 . 8 ( (B+l ) nod 2) 1 
LESS (TRUE) result : 

16.8 + 

10. 4( (L+l ) div 2) + 

2 . 8 ( (L+l ) mod 2) 

L = # bytes compared to 
assert LESS I 
GREATER (FALSE) result : 
17.6 + 

10. 4( (G+l ) div 2) + 

2. 8( (G+l ) nod 2) 

G = # bytes compared to 
assert GREATER. 




28.8 to 170404.0 | EQUAL (TRUE) result : 

18.4 + 

10. 4 ( (B+l ) div 2) + 

2 . 8 ( ( B+l ) nod 2) | 

31.6 to 170406.8 1 GREATER (TRUE) result : 

21.2 + 

10. 4( (G+l ) div 2) + 

2 .8( (G+l ) mod 2) 

G = # bytes compared to 
assert GREATER I 
LESS (FALSE) result : 
22.0 + 

10. 4 ( (L+l ) div 2) + 

2 . 8 ( (L+l ) nod 2) 

L = # bytes compared to 
assert LESS. 




32.4 to 170407.6 



Table C-2. Operator Execution Times. (Continued) 



Mnemonic 


Opcode 


Parameters 


Time 


Remarks 










Jumps 






UJP 

□ : □ 


138 


SB 


12.4 








FJP 

[bool] : [] 


212 


SB 


16.8 


i 10.8 


jump | no 


jump 


EFJ 

[int,int] : 


210 

[] 


SB 


19.2 


j 11.8 


jump | no 


jump 


NFJ 

[int,int] : 


211 

[] 


SB 


19.2 


1 12.0 


jump | no 


jump 


UJPL 
[] : □ 


139 


W 


12.8 








FJPL 

[bool] : [] 


213 


w 


18.8 


i 10.0 


jump | no 


jump 


XJP 

[int] ; [] 


214 


B 


32.0 
29.2 

34.0 


1 

! 


jump | 

TOS < min 
TOS > rax 


index 1 
index 
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Table C 


-2. Operator Execution Times. 


( Continued ) 


Mnemonic 


Opcode 


Parameters 


Time 


Remarks 






Procedure 


and Function Calls 


and Returns 


CPL 


144 


OB 


45.6 




[param] : 


: [activation] 






CFG 


145 


UB 


44.8 




[param] : 


; [activation] 






CPI 


146 


EB, UB 


56.8 to 450.0 


53.6 + 3. 2{DB) 


[param] : 


: [activation] 






CXL 


147 


OBI, UB2 


64.4 




[param] : 


: [activation] 






CXG 


148 


UB1, UB2 


63.2 




[param] : 


: [activation] 






CXI 


149 


OBI, IB, UB2 


: 76.4 to 469.6 


73.2 + 3. 2(DB) 


[param] : 


: [activation] 






CPF 


151 




75.6 




[param, addr , seg# /proc# ] : [activation] 




RPU 


150 


B 


26.0 




[activation] 2 [fmc-result] 






LSL 


153 


EB 


15.6 to 408.8 


12.4 + 3. 2(DB) 



[ ] : [addr] 
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Table C-2. Operator Execution Times. (Continued) 



Mnemonic 


Opcode 


Parameters Time 


Remarks 






System Control 




SIGNAL 


222 


14.8 | 


waitq nil, count > 0 1 


[addr] : 


[] 


18.0 i 


waitq nil, count = 0 1 






52.0 j 


waitq non-nil, no 
taskswitch | 






134.8 


waitq non-nil, 
taskswitch performed 


WAIT 


223 


11.6 1 


count > 0, no wait 1 


[addr] : 


i — i 
i i 


90.8 


count =0, 90.8 is 
time to taskswitch to 
another task. 


LPR 


157 


8.4 | 


TOS < 0 1 


[int] : 


[word] 


55.2 


TOS >= 0 


SPR 


209 


8.4 I 


TOS - 1 = -2, -3 i 


[int, word] : [] 


53.2 | 


TOS - 1 = -1 1 






54.8 


TOS - 1 >= 0 






Debugger 




BPT 


158 




time for this operator 


[] : [activation] 




is comparable to the 



time for CXG. BPT 
unconditionally calls 
execution error 
procedure, resulting 
in a bait of execution. 



Miscellaneous 



NOP 

[] : [] 


156 


3.6 


SWAP 


189 


12.4 


[word ,word] 


: [word, word] 
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C-3. P-MACHINE DESCRIPTION METALANGUAGE 



This appendix presents the III. 0 P-code cperators in a Pascal -like nota- 
tion. Pointer expressions are allowed. For example sp" . i is the contents of 
the memory location the top of stack register is pointing at taken as an integer. 
The expression (sptl)".i is one memory cell above the the sp register taken as 
an integer. The notation i<x:y> means take the field starting frcm bit position 
x for y bits. Thble C-3 shows the P-code cperators in a Pascal -like metalanguage. 

The record declarations used are close to those used by the V'festem Digital 
MicroEngine operating system. The declarations fallow. 



const 



version 


= 'B0 ' ; 


{ Version of this document } 


mscw sz 


= 4; " 


{ Size of mark stack control word in words} 


real sz 


= 2; 


{ Size of reals in words] 


bset sz 


= 4080; 


{ Max size of sets in bits} 


iset sz 


= 255; 


{ Max size of sets in words} 


word sz 


= 16; 


{ Size of word in bits} 


NIL 


= -1024; 


{ Representation for nil pointer} 



type 

object_type 

byte 

sibp 

sibvec 

sib 



mscwp 

mscw 



(int_cbj / real_cbj, byte_cbj / booi_cbj / set_cb j v 
ptr_cb j, sv_cb j, sem_cbj / mscw_cbj / tib_cbj); 

0. .255; 

"sib; 

array [0..127] of sibp; 
record { segment info block } 

segbase: memp; { memory address of seg } 
segleng: integer; { # words in segment } 

{ active calls } 

{ absolute disk address } 

{ physical disk unit } 

{ SP saved by getseg for r el seg } 



segref s : integer ; 
segaddr: integer; 
segunit: integer; 
prevsp : manp; 
end { sib } ; 



= mscw; 



= packed record { mark stack control word } 



msstat: mscwp; 
msdynl : mscwp ; 
msipc : integer ; 

msseg : byte ; 

msflag: byte 
end { mscw } ; 



{ lexical parent pointer } 

{ ptr to caller's mscw } 

{ byte index in return code 
{ seg # of caller code } 



seg } 
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